home *** CD-ROM | disk | FTP | other *** search
/ Directorty Opus 5 - Magellan / Opus 5 - Magellan.iso / Extras / player3_0opus5 / Install < prev    next >
Text File  |  1995-11-05  |  45KB  |  1,173 lines
  1. ; * $VER: Install Players for Opus5 3.0 (10-Okt-95)
  2. ; * Script written by Eckhard Ludwig
  3. ;=============================================================================
  4.  
  5. (complete 0)
  6.  
  7. (set defaultdest      "DOpus5:Arexx")
  8. (set GuideDir           "Dopus5:")
  9. (set Opt 2)
  10. (set INFO               "Install a cd player interface for Directory Opus5 (incl. CDDA-saver), and install filetypes and players for samples IFF 8SVX, RAW, AIFF, WAVE, MPEG Layer 1&2, ADPCM 2&3, AU and VOC.\n\nInstall buttons \"SoundConverter\" & \"Sound_Player_Buttons\" to 'Dopus5:Buttons' for run the players, and for convert samples to WAVE, AIFF, 8SVX, ADPCM 2&3, MPEG Layer 2.")
  11. (set CDPLPrompt         "Please choose the external cdda-player.\nYACDP is only for SCSI2-CDROM ! For SCSI 1&2 CDROM, AT-BUS CDROM, A570 and CDTV select Jukebox.")
  12. (set PrefsPrompt        "Your comming in the setup for the installed programmes.")
  13. (set PlayCDDAPrompt     "I found old settings for PlayCDDA_YACDP.dopus5.\n\nFor new configuration of PlayCDDA_YACDP.dopus5 select the No gadget, or Yes for proceed.")
  14. (set PlayJBPrompt       "I found old settings for PlayCDDA_JB.dopus5.\n\nFor new configuration of PlayCDDA_JB.dopus5 select the No gadget, or Yes for proceed.")
  15. (set PlayHifiPrompt     "I found old settings for PlayHifi.dopus5 or/and PlayHifi_DT.dopus5.\n\nFor new setup select the No gadget, or Yes for proceed.")
  16. (set YACDPPrompt        "PlayCDDA_YACDP.dopus5 needed YACDP V1.2 (© 1994 by Frank Würkner).\nPlease select drawer or path to YACDP !")
  17. (set JBPrompt           "PlayCDDA_JB.dopus5 needed Jukebox (© 1991-1995 by Franz-Josef Reichert).\nPlease select drawer or path to Jukebox !")
  18. (set JBCAT1Prompt       "For show cdda title and songnames needed Jukebox a musiccatalog.\nPlease select the catalog !")
  19. (set JBCAT2Prompt       "Please select drawer and name of the catalog (musiccatalog.cat, bigcatalog.cat or other) !")
  20. (set YACDPVPrompt       "Please select installed Version of YACDP ?")
  21. (set YACDPERROR         "YACDP is not installed or error to path !\nPlease install YACDP to Work:YACDP/YACDP and select yes for default settings, or no for repeat.")
  22. (set JBERROR            "Jukebox is not installed or error to path !\nPlease install JukeBox to Work:Jukebox/JukeBox and select yes for default settings, or no for repeat.")
  23. (set JBCATERROR         "The catalog is not installed or error to path !\nPlease select no for repeat select drawer and file, or select yes and install catalog to Work:Jukebox/JukeBox/musiccatalog.cat.")
  24. (set scsihaPrompt       "Which hostadaptor is connected ?")
  25. (set cdrom_Prompt    "Which CDROM drive is connected ?")
  26. (set scsidev_Prompt     "Specify the name of your hostadaptor driver software (exec device):")
  27. (set scsiunit_prompt    "Specify the unit address your CDROM drive is connected to:")
  28. (set CDDAPrompt         "Save audio-cd title to AIFF, IFF 8SVX needed CDDA V1.12.\nPlease select drawer or path to CDDA !")
  29. (set CDDAERROR          "CDDA is not installed or error to path !\nPlease install CDDA to SYS:C and select yes for default settings, or no for repeat.")
  30. (set CDRPrompt          "Save audio-cd title to ADPCM3 needed CDRipper.\nPlease select drawer or path to CDRipper !")
  31. (set CDRERROR           "CDRipper is not installed or error to path !\nPlease install to C:CDRipper and select yes for default settings, or no for repeat.")
  32. (set CDDA_FSPrompt      "Save audio-cd title to RAW, AIFF, WAVE, VOC, AU needed optional CDDA-Filesystem (© 1995 by Franz-Josef Reichert).\nPlease select drawer or path to \"CDDA\" !")
  33. (set CDDA_FSERROR       "CDDA-Filesystem is not installed or error to path !\nSelect yes for default settings, or no for repeat.")
  34. (set SOXERROR           "AmiSOX is not installed or error to path !\nSelect yes for default settings, or no for repeat.")
  35. (set SOXPrompt          "Save audio-cd title to AIFF, WAVE, VOC, AU needed AmiSOX.\nPlease select drawer and the datei AmiSOX (sox, sox020, sox881 or sox020881).")
  36. (set FakePrompt         "Jukebox needed for identifikation of catalog entry the cd-barcode. Read your cdrom no barcode, select 'False ID'. See Jukebox.guide.") 
  37. (set TIMEPrompt         "Please entry for time end of song, format <min>:<sek>:<1/75> (min. 00:00:00, max. 00:04:00).")
  38. (set Play16Prompt       "PlayHifi.dopus5 and PlayHifi_DT.dopus5 needed Play16 1.5 (© 1995 by Thomas Wenzel). Please select drawer or path to Play16 !")
  39. (set Play16ERROR        "'Play16' is not installed or error to path !\nSelect 'yes' for standard \"C:play16\" or 'no' for repeat. Please install Play16 to SYS:C.")
  40. (set PlayADPCMPrompt    "PlayHifi.dopus5 and PlayHifi_DT.dopus5 needed for play adpcm-sound PlayADPCM. Please select drawer to PlayADPCM !")
  41. (set PlayADPCMERROR     "'PlayADPCM' is not installed or error to path. Select yes for default settings, or no for repeat.")
  42. (set PlayMPEGPrompt     "PlayHifi.dopus5 and PlayHifi_DT.dopus5 needed mpega (© 1995 by Stephane Tavenard). Please select drawer to mpega !")
  43. (set PlayMPEGERROR      "'mpega' is not installed or error to path !\n\nSelect 'yes' for standard \"C:mpega\" or 'no' for repeat.")
  44. (set SCSIPrompt         "Please select, play over CDROM or play over scsi-bus and Amigaaudio.")
  45. (set CDVOLPrompt        "Please select volume for your CDROM. '0' = no volumesetting.")
  46. (set AMVOLPrompt        "Please select volume for your Amigaaudio. '0' = no volumesetting.")
  47. (set AmigaPrompt        "Play16-setup:\nFor correct playback speed, i need your screenmode of DirectoryOpus5.")
  48. (set PlayPrompt         "Play16-setup:\nPlease select the method of audio-output.\nFor 68020 and better select 14bit (see play16.doc).")
  49. (set MPEG_1Prompt       "mpega-setup:\nDefines the decoding quality, and also the decoding speed.\nSlow CPU users, select Low quality ...")
  50. (set MPEG_2Prompt       "mpega-setup:\nDefines the output decoding frequency. You can only use Normal mode if you have a screenmode >15kHz and a fast CPU !")
  51. (set MPEG_3Prompt       "mpega-setup:\nOutput: In 8 bits mode, play 8-bit audio samples.\nIn 14 bits mode, play 14-bit audio samples (better).")
  52. (set GuidePrompt        "For programmes exists guide, sorry only german (AmigGuide®-Format) with pics and testtools.")
  53. (set GuideDirPrompt     "Please select drawer for: Soundplayer.guide and players.readme.")
  54. (set InstallPrompt      "Which of the following locale should be installed ?")
  55. (set Opus5DirPrompt     "DirectoryOpus not found ?\nPlease select path to DirectoryOpus !")
  56. (set Opus5Message       "Is DirectoryOpus correct installed ?\nPlease select drawer to DirectoryOpus5 or install DirectoryOpus5 first !")
  57. (set Opus5Help          "Is DirectoryOpus correct installed ?\nPlease install DirectoryOpus5 first !")
  58. (set Opus5Old           "Is version of DirectoryOpus 5.11 or later ?\n(Read Soundplayer.guide).\nInstall programmes ?")
  59. (set Deinstallprompt    "Newer Version of Soundplayers exists!\nIm this delete ??")
  60. (set Opus5OHelp         "I need Version 5.11 or later of Directory Opus! Test version, see Soundplayer.guide.")
  61. (set ArexxDirPrompt     "Please select Arexx-Drawer for Playerscripts!")
  62. (set RexxPrompt        "I need Arexx for run programmes.\n\nKlick 'Proceed' for add line\n'SYS:System/Rexxmast >NIL:'\ndo your 'User-Startup'")
  63. (set PlayerCopy1Prompt  "Copy cdda players/saver ...")
  64. (set PlayerCopy2Prompt  "Copy sampleplayers ...")
  65. (set LocaleCopyPrompt   "Copy cataloges ...")
  66. (set ButtonCopyPrompt   "Copy buttons ...")
  67. (set FiletypesPrompt    "Copy filetypes ...")
  68. (set GuideCopyPrompt    "Copy guide & pics ...")
  69. (set GuideCopyPrompt2    "Copy checktools ...")
  70. (set ToolsCopyPrompt    "Copy tools ...")
  71. (set ansi_error         "Jukebox needed external playmodul 'ansi.player' Version 2.9 or newer. Your version of modul is to old, please update (see aminet: jukebox2_1.lha.")
  72. (set atapi_error        "Jukebox needed external playmodul 'atapi.player' Version 2.3 or newer. Your version of modul is to old, please update (see aminet: jukebox2_1.lha.")
  73. (set OpusEdit           "Defaultdir for players is not standard (Dopus5:Arexx)!\nEdit Arexx-path AudioCD-Buttons and Filetypes.")
  74. (SET #exitMsg           "For play cdda or samples, please select to opus5-menu 'Buttob/Load/Sound_Player_Buttons the buttons 'CDDA Jukebox' 'CDDA YACDP' or 'Play Hifi', or play samples over doubleklick.\nMuch fun with Programmes\nfor DirOpus5 wish you\nEckhard Ludwig")
  75.  
  76. ; deutsche Texte *****************************
  77.  
  78. (IF (= @language "deutsch")
  79. (
  80. (set Opt 1)
  81. (set INFO               "Diese Installation ergänzt Directory Opus5 um die Funktion eines komfortablen CDROM-Audiospielers (inklusive CDDA-Saver), und installiert Dateitypen und Player für Samples der Formate IFF 8SVX, RAW, AIFF, WAVE, MPEG Layer 1&2, ADPCM 2&3, AU und VOC.\n\nWeiterhin werden die Knopfbänke \"SoundConverter\" und \"Sound_Player_Buttons\" nach 'Dopus5:Buttons' installiert. Diese ermöglichen den Aufruf der Player, und Konvertieren von Samples nach WAVE, AIFF, 8SVX, ADPCM 2&3 und MPEG Layer 2.")
  82. (set CDPLPrompt         "Bitte wählen Sie, welchen externen CDROM Audioplayer Sie verwenden möchten.\nYACDP unterstützt nur SCSI2-CDROM ! Empfohlen wird Jukebox, was nahezu sämtliche SCSI 1&2 CDROM, AT-BUS CDROM sowie A570 und CDTV unterstützt.")
  83. (set PrefsPrompt        "Die neu installierten Programme müssen jetzt konfiguriert werden.\n\nEs werden Angaben zu den externen Programmen (nachzulesen in Soundplayer.guide) und zu Ihrem Amigasystem benötigt.")
  84. (set PlayCDDAPrompt     "Es ist bereits eine Konfigurationsdatei für PlayCDDA_YACDP.dopus5 vorhanden.\n\nSollen die alten Einstellungen übernommen werden ?")
  85. (set PlayJBPrompt       "Es ist bereits eine Konfigurationsdatei für PlayCDDA_JB.dopus5 vorhanden.\n\nSollen die alten Einstellungen übernommen werden ?")
  86. (set PlayHifiPrompt     "Es ist bereits eine Konfigurationsdatei für PlayHifi.dopus5 bzw. PlayHifi_DT.dopus5 vorhanden.\n\nSollen die alten Einstellungen übernommen werden ?")
  87. (set YACDPPrompt        "PlayCDDA_YACDP.dopus5 benötigt als externen Player YACDP (© 1994-1995 by Frank Würkner). Bitte wählen Sie die Schublade, wo YACDP installiert wurde, oder 'Weiter' !")
  88. (set JBPrompt           "PlayCDDA_JB.dopus5 benötigt als externen CDDA-Player Jukebox (© 1991-1995 by Franz-Josef Reichert). Bitte wählen Sie die Schublade, wo Jukebox installiert wurde, oder 'Weiter' !")
  89. (set JBCAT1Prompt       "Jukebox identifiziert den Namen und die Titel einer CD anhand einer Datenbank (Musikkatalog). Bitte wählen Sie einen Musikkatalog aus. Der grosse Katalog 'bigcatalog.cat' belegt ca. 400K Speicher und verlängert die Ladezeit von Jukebox entsprechend !")
  90. (set JBCAT2Prompt       "Bitte wählen Sie Schublade und Name des verwendeten Musikkataloges, z.B. 'musiccatalog.cat' oder 'bigcatalog.cat', oder 'Weiter' !")
  91. (set YACDPVPrompt       "Welche Version von YACDP wurde installiert ? Ab V1.205Beta bitte 1.3 wählen !")
  92. (set YACDPERROR         "'YACDP' ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung \"Work:YACDP/YACDP\" benutzen, falls sie YACDP noch nicht installiert haben ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  93. (set JBERROR            "'Jukebox' ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung \"Work:Jukebox/JukeBox\" benutzen, falls sie JukeBox noch nicht installiert haben ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  94. (set JBCATERROR         "Der gewählte Katalog ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung \"Work:Jukebox/musiccatalog.cat\" benutzen, falls sie JukeBox noch nicht installiert haben ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  95. (set scsihaPrompt       "Welcher Hostadapter ist für das CDROM Laufwerk angeschlossen ?")
  96. (set scsiunit_Prompt    "Welche Unit Nummer ist an Ihrem CDROM Laufwerk eingestellt ?")
  97. (set cdrom_Prompt    "Welches CDROM Laufwerk ist angeschlossen ?")
  98. (set scsidev_Prompt    "Wie ist der Treibername (xxxx.device) des für das CDROM benutzten Hostadapters ?\nBitte Groß-/Kleinschreibung für xxxx genau beachten !")
  99. (set CDDAPrompt         "Zum Speichern von CDDA Audiodaten in AIFF und IFF 8SVX wird das externe Programm CDDA V1.12 benötigt. Bitte wählen Sie die Schublade, wo CDDA installiert wurde !")
  100. (set CDDAERROR          "'CDDA' ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung \"C:CDDA\" benutzen, falls sie CDDA (noch) nicht installiert haben ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  101. (set CDRPrompt          "Zum Speichern von CDDA Audiodaten in ADPCM3 wird das externe Programm CDRipper benötigt. Bitte wählen Sie die Schublade, wo CDRipper installiert wurde !")
  102. (set CDRERROR           "'CDRipper' ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung \"C:CDRipper\" benutzen, falls sie CDRipper (noch) nicht installiert haben bzw. nicht benötigen ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  103. (set CDDA_FSPrompt      "Zum Speichern von CDDA Audiodaten in RAW, AIFF, WAVE, VOC, AU wird optional das CDDA-Filesystem (© 1995 by Franz-Josef Reichert) benötigt. Bitte wählen Sie die Schublade, wo \"CDDA\" installiert wurde, oder 'Weiter'.")
  104. (set CDDA_FSERROR       "Das CDDA Filesystem ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung benutzen, falls Sie CDDA nicht installiert haben ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  105. (set SOXERROR           "AmiSOX ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung benutzen, falls Sie AmiSOX nicht installiert haben ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  106. (set SOXPrompt          "Zum Speichern von CDDA Audiodaten in AIFF, WAVE, VOC und AU wird das externe Programm AmiSOX benötigt. Bitte wählen Sie die Schublade und die Datei AmiSOX aus (sox, sox020, sox881 oder sox020881).")
  107. (set FakePrompt         "Je nach verwendeten CDROM Laufwerk benutzt Jukebox zur Katalogzuordnung einer CD den gespeicherten Barcode. Falls Ihr CDROM Barcode nicht lesen kann, verwenden Sie 'False ID'. Siehe auch Jukebox.guide.")
  108. (set TIMEPrompt         "Bitte wählen Sie die Auslaufzeit im Format <Minuten>:<Sekunden>:<1/75>. Diese Angabe bestimmt, wann das Spielen eines Titel beendet wird, unter Berücksichtigung der Pause zwischen 2 Titeln. (min. 00:00:00, max. 00:04:00)")
  109. (set Play16Prompt       "PlayHifi.dopus5 und PlayHifi_DT.dopus5 benötigen als externen Player Play16 1.5 (© 1995 by Thomas Wenzel). Bitte wählen Sie die Schublade, wo Play16 installiert wurde, oder 'Weiter' !")
  110. (set Play16ERROR        "'Play16' ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung \"C:Play16\" benutzen, falls sie Play16 noch nicht installiert haben ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  111. (set PlayADPCMPrompt    "PlayHifi.dopus5 und PlayHifi_DT.dopus5 benötigen für ADPCM-Sounddateien den externen Player PlayADPCM. Bitte wählen Sie die Schublade, wo PlayADPCM installiert wurde, oder 'Weiter' !")
  112. (set PlayADPCMERROR     "'PlayADPCM' ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung \"C:PlayADPCM\" benutzen, falls sie PlayADPCM noch nicht installiert haben bzw. nicht benötigen ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  113. (set PlayMPEGPrompt     "PlayHifi.dopus5 und PlayHifi_DT.dopus5 benötigen als externen Player mpega (© 1995 by Stephane Tavenard). Bitte wählen Sie die Schublade, wo mpega installiert wurde, oder 'Weiter' !")
  114. (set PlayMPEGERROR      "'mpega' ist nicht oder unter einen abweichenden Namen installiert, oder die gewählte Schublade ist falsch !\n\nSoll ich die Voreinstellung \"C:mpega\" benutzen, falls sie mpega noch nicht installiert haben ?\n\nMit 'Nein' können sie erneut eine Schublade auswählen.")
  115. (set SCSIPrompt         "Bitte wählen Sie, ob die Audiowiedergabe über die Audioausgänge des CDROM oder über SCSI-Bus und Amigaaudio (Paula) erfolgen soll.\n\nWiedergabe über Amigaaudio ist nur möglich, wenn das CDROM das Senden von Audiodaten über den SCSI-Bus unterstützt !\nEmpfohlen wird Wiedergabe über die Audioausgänge des CDROM-Laufwerkes.")
  116. (set CDVOLPrompt        "Bitte wählen Sie die Wiedergabelautstärke für Ihr CDROM-Laufwerk. Die zulässigen Werte (meist 1 bis 255) entnehmen Sie bitte Ihrer CDROM-Dokumentation. Der Wert '0' bedeutet, das die Lautstärke durch dieses Programm nicht verändert wird.")
  117. (set AMVOLPrompt        "Bitte wählen Sie die Wiedergabelautstärke für Ihre Amiga-Audioausgänge (1 bis 65). Der Wert '0' bedeutet, das die Lautstärke durch dieses Programm nicht verändert wird.")
  118. (set AmigaPrompt        "Play16-Konfiguration:\nUm die korrekte Abspielrate zu setzen, benötige ich den für DirectoryOpus5 benutzten Bildschirmmode.")
  119. (set PlayPrompt         "Play16-Konfiguration:\nWählen Sie die gewünschte Wiedergabequalität. Für 68020 und besser wird 14bit empfohlen (siehe play16.dok).")
  120. (set MPEG_1Prompt       "mpega-Konfiguration:\nWählen Sie die mögliche Ausgabequalität, je nach CPU-Typ/Taktfrequenz.\nBei Problemen die niedrigere Qualität auswählen.")
  121. (set MPEG_2Prompt       "mpega-Konfiguration:\nWählen Sie die Ausgabefrequenz.\nNormal (nicht bei PAL/NTSC-Bildschirmmode !) benötigt eine schnelle CPU !")
  122. (set MPEG_3Prompt       "mpega-Konfiguration:\nWählen Sie die gewünschte Wiedergabequalität.")
  123. (set GuidePrompt        "Für die Programme existiert eine umfangreiche deutschsprachige Anleitung im AmigaGuide®-Format mit zugehörigen Bild- und Testdateien.\n\nDiese können sie jetzt in ihre bevorzugte Schublade für Dokumentdateien installieren.")
  124. (set GuideDirPrompt     "Wohin sollen die deutsche Anleitung und die zugehörigen Dateien kopiert werden?")
  125. (set Installprompt      "Bitte wählen Sie für die Programme Ihre bevorzugte(n) Sprachversion(en).")
  126. (set Opus5DirPrompt     "Bitte wählen Sie die Schublade, wo DirectoryOpus installiert wurde!")
  127. (set Opus5Message       "Die zu installierenden Programme sind nur von DirectoryOpus5 aus nutzbar !\n\nIst DirectoryOpus5 korrekt installiert wurden ?\n\nBitte wählen Sie die Schublade, wo DirectoryOpus installiert wurde oder installieren sie DirectoryOpus5 zuerst !")
  128. (set Opus5Help          "Die zu installierenden Programme sind nur von DirectoryOpus5 aus nutzbar !\nIst DirectoryOpus5 korrekt installiert wurden ?\nBitte installieren sie DirectoryOpus5 zuerst !")
  129. (set Opus5Old           "Für die zu installierenden Programme wird mindesten Version 5.11 von DirectoryOpus benötigt.\n(siehe Soundplayer.guide).\nSollen die Programme installiert werden ?")
  130. (set Deinstallprompt    "Es ist bereits eine neuere Version der Soundplayer installiert!\nSollen diese wirklich ersetzt werden ?")
  131. (set Opus5OHelp         "Ich benötige mindesten V5.11 von DirectoryOpus! Zum Testen der Version lesen sie Soundplayers.guide.")
  132. (set ArexxDirPrompt     "Die Programme sollten in das Arexx-Verzeichnis von DirOpus5 installiert werden!\nBitte wählen Sie eine Schublade für die Player-Scripte !")
  133. (set RexxPrompt        "Die Skript-Sprache ARexx ist im Lieferumfang von AmigaDOS enthalten, jedoch nicht verfügbar, bevor Sie nicht das Programm 'RexxMast' aufgerufen haben.\nEs wird empfohlen, ARexx immer zu starten.\nWenn Sie ARexx automatisch starten lassen möchten, klicken Sie auf 'Weiter', um ARexx von Ihrer 'User-Startup' aus starten zu lassen.")
  134. (set PlayerCopy1Prompt  "Kopiere CDDA Player/Saver ...")
  135. (set PlayerCopy2Prompt  "Kopiere Sample Player ...")
  136. (set LocaleCopyPrompt   "Kopiere Cataloge ...")
  137. (set ButtonCopyPrompt   "Kopiere Knopfbank ...")
  138. (set FiletypesPrompt    "Kopiere Datatypes ...")
  139. (set GuideCopyPrompt    "Kopiere Anleitung und Bilder...")
  140. (set GuideCopyPrompt2    "Kopiere Checktools ...")
  141. (set ToolsCopyPrompt    "Kopiere Tools ...")
  142. (set ansi_error         "Für das externe Playermodul 'ansi.player' (Jukebox) wird mindesten Version 2.9 benötigt.\nBitte aktualisieren Sie das Modul ('ansi.player' liegt im Jukeboxverzeichnis). Ein aktuelles Modul finden Sie z.B. in aminet in dem Paket jukebox2_1.lha.")
  143. (set atapi_error        "Für das externe Playermodul 'atapi.player' (Jukebox) wird mindesten Version 2.3 benötigt.\nBitte aktualisieren Sie das Modul ('atapi.player' liegt im Jukeboxverzeichnis). Ein aktuelles Modul finden Sie z.B. in aminet in dem Paket jukebox2_1.lha.")
  144. (set OpusEdit           "Das gewählte Playerverzeichnis entspricht nicht dem Standard (Dopus5:Arexx)!\n Die Arexx-Pfade in Audio-CD Button und Datatypes müssen entsprechend ediert werden!")
  145. (SET #exitMsg           "Zum Spielen von Audio-CD oder Samples: Wählen Sie im Opus5-Menü 'Knöpfe/Laden/' die Datei 'Sound_Player_Buttons' an. Klicken Sie die Knöpfe 'CDDA Jukebox' bzw. 'CDDA YACDP' oder 'Play Hifi', oder spielen Sie Samples per Doppelklick.\n\nViel Spaß mit den Soundprogrammen\nfür DirOpus5 wünscht\nEckhard Ludwig")
  146. )
  147. )
  148. ;*********************************************
  149. ; check if Directory Opus 5 is already installed
  150. ; check Version
  151.  
  152. (if (not (exists "DOpus5:DirectoryOpus" (noreq)))
  153.     ((message Opus5Message)
  154.     (set Opus5path (askdir
  155.     (prompt Opus5DirPrompt)
  156.     (help @askdir-help)
  157.     (default "Work:")))
  158.     (if (not (exists (tackon Opus5path "DirectoryOpus") (noreq)))
  159.        (abort Opus5Help))    
  160.     (makeassign "Dopus5" Opus5path (safe))
  161. ))
  162.  
  163. (if (> 327691 (getversion "DOpus5:DirectoryOpus"))
  164.     (if (not (askbool
  165.        (prompt Opus5Old)
  166.        (help Opus5OHelp)
  167.        (default 0)))
  168.     (abort Opus5OHelp))    
  169. )
  170.  
  171. ;*********************************************
  172. ; expertentest & versionstest older version PlayCDDA_JB.dopus5
  173.  
  174. (if (= @user-level 2)
  175.   (if (not (exists defaultdest (noreq)))
  176.     (set defaultdest (askdir
  177.     (prompt ArexxDirPrompt)
  178.     (help    @askdir-help)
  179.     (default "Rexx:")
  180. ))))
  181.  
  182. (set @default-dest defaultdest)
  183.  
  184. (if (exists (tackon defaultdest "PlayCDDA_JB.dopus5") (noreq))
  185.    ((set version (getversion ("dopus5:arexx/PlayCDDA_JB.dopus5")))
  186.    (if (> version (getversion "Arexx/PlayCDDA_JB.dopus5"))
  187.        (if (not (askbool 
  188.        (prompt Deinstallprompt)
  189.        (help @askbool-help)
  190.        (default 0)))
  191.           (exit (quiet)))
  192. )))
  193.  
  194.  
  195.  
  196.  
  197. ;*********************************************
  198. ; copy the files
  199.  
  200. (message INFO)
  201. (set CDDA_flag (askchoice
  202.     (prompt CDPLPrompt)
  203.     (help @askchoice-help)
  204.     (choices "Jukebox" "YACDP" "Jukebox & YACDP")
  205.     (default 2)
  206.  ))
  207.  
  208. (if (= CDDA_flag 0)
  209.     ((set catpat "PlayCDDA_JB.catalog")
  210.      (set CDDA_pattern "PlayCDDA_JB.dopus5")))
  211. (if (= CDDA_flag 1)
  212.     ((set catpat "PlayCDDA_YACDP.catalog")
  213.      (set CDDA_pattern "PlayCDDA_YACDP.dopus5")))
  214. (if (= CDDA_flag 2)
  215.     ((set catpat "PlayCDDA#?")
  216.      (set CDDA_pattern "PlayCDDA#?")))
  217.  
  218. (copyfiles
  219.    (prompt PlayerCopy1Prompt)
  220.    (help @copyfiles-help)
  221.    (source "arexx")
  222.    (dest defaultdest)
  223.    (pattern CDDA_pattern)
  224.    (confirm "EXPERT")
  225.    (optional "force")
  226. )
  227.  
  228. (copyfiles
  229.    (prompt PlayerCopy2Prompt)
  230.    (help @copyfiles-help)
  231.    (source "arexx")
  232.    (dest defaultdest)
  233.    (pattern "PlayHifi#?")
  234.    (confirm "EXPERT")
  235.    (optional "force")
  236. )
  237.  
  238. ; Update: PlayHifi_DT.dopus5 ersetzt PlayMPEG_DT.dopus5
  239.  
  240. (if (exists (tackon defaultdest "PlayHifi_DT.dopus5") (noreq))
  241.     (delete (tackon defaultdest "PlayMPEG_DT.dopus5"))
  242. )
  243.  
  244.  
  245. (complete 15)
  246.  
  247. (IF (= @language "All")
  248.     (set Opt 511))
  249.  
  250. (set installchoice
  251.    (askoptions
  252.    (prompt InstallPrompt)
  253.    (help @askoptions-help)
  254.    (choices "Deutsch" "English" "dansk" "français" "italiano" "nederlands" "norsk" "suomi" "svenska")
  255.    (default Opt)
  256. ))
  257.  
  258.  
  259. ;install cataloge
  260.  
  261. (set n 0)
  262.  
  263. (while (<> n 2)
  264.  
  265.   ((set filepat
  266.       (select n catpat "PlayHifi.catalog"))
  267.  
  268.    (set n (+ n 1))
  269.  
  270. (IF (BITAND installchoice 1)
  271.   (copyfiles
  272.    (prompt LocaleCopyPrompt)
  273.    (help @copyfiles-help)
  274.    (source "Locale/Catalogs/deutsch")
  275.    (dest "SYS:Locale/Catalogs/deutsch")
  276.    (pattern filepat)
  277.    (confirm "EXPERT")
  278.    (optional "force")
  279.   ))
  280.  
  281. (IF (BITAND installchoice 2)
  282.   (copyfiles
  283.    (prompt LocaleCopyPrompt)
  284.    (help @copyfiles-help)
  285.    (source "Locale/Catalogs/english")
  286.    (dest "SYS:Locale/Catalogs/english")
  287.    (pattern filepat)
  288.    (confirm "EXPERT")
  289.    (optional "force")
  290.   ))
  291.  
  292. (IF (BITAND installchoice 4)
  293.   (copyfiles
  294.    (prompt LocaleCopyPrompt)
  295.    (help @copyfiles-help)
  296.    (source "Locale/Catalogs/dansk")
  297.    (dest "SYS:Locale/Catalogs/dansk")
  298.    (pattern filepat)
  299.    (confirm "EXPERT")
  300.    (optional "force")
  301.   ))
  302.  
  303. (IF (BITAND installchoice 8)
  304.   (copyfiles
  305.    (prompt LocaleCopyPrompt)
  306.    (help @copyfiles-help)
  307.    (source "Locale/Catalogs/français")
  308.    (dest "SYS:Locale/Catalogs/français")
  309.    (pattern filepat)
  310.    (confirm "EXPERT")
  311.    (optional "force")
  312.   ))
  313.  
  314. (IF (BITAND installchoice 16)
  315.   (copyfiles
  316.    (prompt LocaleCopyPrompt)
  317.    (help @copyfiles-help)
  318.    (source "Locale/Catalogs/italiano")
  319.    (dest "SYS:Locale/Catalogs/italiano")
  320.    (pattern filepat)
  321.    (confirm "EXPERT")
  322.    (optional "force")
  323.   ))
  324.  
  325. (IF (BITAND installchoice 32)
  326.   (copyfiles
  327.    (prompt LocaleCopyPrompt)
  328.    (help @copyfiles-help)
  329.    (source "Locale/Catalogs/nederlands")
  330.    (dest "SYS:Locale/Catalogs/nederlands")
  331.    (pattern filepat)
  332.    (confirm "EXPERT")
  333.    (optional "force")
  334.   ))
  335.  
  336. (IF (BITAND installchoice 64)
  337.   (copyfiles
  338.    (prompt LocaleCopyPrompt)
  339.    (help @copyfiles-help)
  340.    (source "Locale/Catalogs/norsk")
  341.    (dest "SYS:Locale/Catalogs/norsk")
  342.    (pattern filepat)
  343.    (confirm "EXPERT")
  344.    (optional "force")
  345.   ))
  346.  
  347. (IF (BITAND installchoice 128)
  348.   (copyfiles
  349.    (prompt LocaleCopyPrompt)
  350.    (help @copyfiles-help)
  351.    (source "Locale/Catalogs/suomi")
  352.    (dest "SYS:Locale/Catalogs/suomi")
  353.    (pattern filepat)
  354.    (confirm "EXPERT")
  355.    (optional "force")
  356.   ))
  357.  
  358. (IF (BITAND installchoice 256)
  359.   (copyfiles
  360.    (prompt LocaleCopyPrompt)
  361.    (help @copyfiles-help)
  362.    (source "Locale/Catalogs/svenska")
  363.    (dest "SYS:Locale/Catalogs/svenska")
  364.    (pattern filepat)
  365.    (confirm "EXPERT")
  366.    (optional "force")
  367.   ))
  368.  
  369. ))
  370.  
  371. (complete 25)
  372.  
  373. ;*********************************************
  374. ; copy buttons
  375.  
  376. (copyfiles
  377.    (prompt ButtonCopyPrompt)
  378.    (help @copyfileshelp)
  379.    (source "buttons")
  380.    (dest "DOpus5:buttons")
  381.    (confirm "EXPERT")
  382.    (optional "force")
  383.    (pattern "#?")
  384.    (files)
  385. )
  386.  
  387. (complete 40)
  388.  
  389. ;*********************************************
  390. ; copy filetypes
  391.  
  392. (copyfiles
  393.    (prompt FiletypesPrompt)
  394.    (help @copyfileshelp)
  395.    (source "filetypes")
  396.    (dest "DOpus5:filetypes")
  397.    (optional "force")
  398.    (confirm "EXPERT")
  399.    (pattern "#?")
  400.    (files)
  401. )
  402.  
  403. (complete 55)
  404.  
  405. ;*********************************************
  406. ; copy tools
  407.  
  408. (copyfiles
  409.    (prompt ToolsCopyPrompt)
  410.    (help @copyfiles-help)
  411.    (source "c")
  412.    (dest "SYS:C")
  413.    (pattern "#?")
  414.    (optional "force")
  415.    (confirm "AVERAGE")
  416.    (files)
  417. )
  418.  
  419. (complete 65)
  420.  
  421. ;*********************************************
  422. ; ADD REXX TO USER-STARTUP
  423.  
  424. (if
  425.     (startup "ARexx"
  426.         (prompt RexxPrompt)
  427.         (help @startup-help)
  428.         (command "SYS:System/RexxMast >NIL:")
  429.     )
  430.     (run "SYS:System/RexxMast >NIL:")
  431. )
  432.  
  433. ;*********************************************
  434. ; set prefs PlayCDDA_JB.dopus5
  435.  
  436. (message PrefsPrompt)
  437.  
  438. (if (exists (tackon defaultdest "PlayCDDA_JB.dopus5") (noreq))
  439.     ((set JB_flag 1)
  440.      (if (exists ("ENVARC:PlayCDDA_JB.prefs") (noreq))
  441.          (if (askbool
  442.              (prompt PlayJBPrompt)
  443.              (help " ")
  444.              (default 1))
  445.              (set JB_flag 0))    
  446.  
  447.     )))
  448.  
  449. (if (= JB_flag 1)
  450. (
  451.  ((set JBDir "Work:Jukebox")
  452.     (if (<> 1 (exists (tackon JBDir "JukeBox") (noreq)))
  453.      (until (= flag_8 1)
  454.            ((set JBDir (askdir
  455.             (prompt JBPrompt)
  456.             (help    @askdir-help)
  457.             (default "Work:")
  458.                 ))
  459.            (if (<> 1 (exists (tackon JBDir "JukeBox") (noreq)))
  460.              (if (askbool
  461.                  (prompt JBERROR)
  462.                  (help " "))
  463.                  ((set flag_8 1)
  464.                  (set JBDir "Work:Jukebox")))
  465.                  (set flag_8 1))
  466.            ))
  467.     )             
  468.  )
  469.  
  470.      (until (= flag_12 1)
  471.      ((set CAT_flag (askchoice
  472.         (prompt JBCAT1Prompt)
  473.         (help @askchoice-help)
  474.         (choices "musiccatalog.cat" "bigcatalog.cat" "Other (Anderer)")
  475.         (default 0)
  476.      ))
  477.     (if (= CAT_flag 0)
  478.         (set JBCAT (tackon JBDir "musiccatalog.cat")))
  479.     (if (= CAT_flag 1)
  480.         (set JBCAT (tackon JBDir "bigcatalog.cat")))
  481.     (if (= CAT_flag 2)
  482.             (set JBCAT (askfile
  483.             (prompt JBCAT2Prompt)
  484.             (help    @askfile-help)
  485.             (default (tackon JBDir "musiccatalog.cat"))
  486.                 )))
  487.            (if (<> 1 (exists JBCAT (noreq)))
  488.              (if (askbool
  489.                  (prompt JBCATERROR)
  490.                  (help " "))
  491.                  ((set flag_12 1)
  492.                  (set JBCAT "Work:Jukebox/musiccatalog.cat")))
  493.                  (set flag_12 1))
  494.            ))
  495.  
  496.  (set FAKE 0)
  497.  (set TIME "00:02:00")
  498.  
  499.  (if (= @user-level 2)
  500.   (
  501.    (set FAKE (askchoice
  502.     (prompt FakePrompt)
  503.     (help @askchoice-help)
  504.     (choices "Barcode ID" "False ID")
  505.     (default 0)
  506.     ))
  507.  
  508.  (set TIME (askstring
  509.     (prompt TIMEPrompt)
  510.     (help @askstring-help)
  511.     (default "00:02:00")
  512.    ))
  513.  ))
  514.  
  515.  (if (or (> TIME "00:04:00") (< TIME "00:00:00"))
  516.      (set TIME "00:02:00"))
  517.  
  518.  ((set CDDADir "C:")
  519.     (if (<> 1 (exists (tackon CDDADir "CDDA") (noreq)))
  520.      (until (= flag_9 1)
  521.            ((set CDDADir (askdir
  522.             (prompt CDDAPrompt)
  523.             (help    @askdir-help)
  524.             (default "SYS:")
  525.                 ))
  526.            (if (<> 1 (exists (tackon CDDADir "CDDA") (noreq)))
  527.              (if (askbool
  528.                  (prompt CDDAERROR)
  529.                  (help " "))
  530.                  ((set flag_9 1)
  531.                  (set CDDADir "C:")))
  532.                  (set flag_9 1))
  533.            ))
  534.     )             
  535.  )
  536.  
  537.  ((set CDRDir "C:")
  538.     (if (<> 1 (exists (tackon CDRDir "CDRipper") (noreq)))
  539.      (until (= flag_10 1)
  540.            ((set CDRDir (askdir
  541.             (prompt CDRPrompt)
  542.             (help    @askdir-help)
  543.             (default "SYS:")
  544.                 ))
  545.            (if (<> 1 (exists (tackon CDRDir "CDRipper") (noreq)))
  546.              (if (askbool
  547.                  (prompt CDRERROR)
  548.                  (help " "))
  549.                  ((set flag_10 1)
  550.                  (set CDRDir "C:")))
  551.                  (set flag_10 1))
  552.            ))
  553.     )             
  554.  )
  555.  
  556.  ((set CDDA_FSDir JBDir)
  557.    ((if (= 1 (exists "L:audio-handler" (noreq)))
  558.     (if (<> 1 (exists (tackon CDDA_FSDir "CDDA") (noreq)))
  559.      (until (= flag_11 1)
  560.            ((set CDDA_FSDir (askdir
  561.             (prompt CDDA_FSPrompt)
  562.             (help    @askdir-help)
  563.             (default "SYS:Storage/DosDrivers")
  564.                 ))
  565.            (if (<> 1 (exists (tackon CDDA_FSDir "CDDA") (noreq)))
  566.              (if (askbool
  567.                  (prompt CDDA_FSERROR)
  568.                  (help " "))
  569.                  ((set flag_11 1)
  570.                  (set CDDA_FSDir JBDir)))
  571.                  (set flag_11 1))
  572.            ))
  573.     )))             
  574.  )
  575.  
  576.  (set SOXFile "C:sox020")
  577.    (if (= 1 (exists (tackon CDDA_FSDir "CDDA") (noreq)))
  578.      (until (= flag_13 1)
  579.            ((set SOXFile (askfile
  580.             (prompt SOXPrompt)
  581.             (help    @askfile-help)
  582.             (default "SYS:C/sox020")
  583.                 ))
  584.            (if (<> 1 (exists SOXFile (noreq)))
  585.              (if (askbool
  586.                  (prompt SOXERROR)
  587.                  (help " "))
  588.                  ((set flag_13 1)
  589.                  (set SOXFile "C:sox020")))
  590.                  (set flag_13 1))
  591.            )
  592.  )
  593.  )
  594.  
  595.  
  596.  (set Unit 3)
  597.  
  598.  (set scsi_flag (askchoice
  599.         (prompt scsihaPrompt)
  600.         (help @askchoice-help)
  601.         (choices    "Commodore A590/A2091"
  602.                 "Commodore A3000"
  603.                 "Commodore A4091"
  604.                 "Commodore CDTV/A570"
  605.                 "bsc Oktagon 508/2008"    
  606.                 "bsc Alf-3"
  607.                 "VOB Breitfeld"
  608.                 "bsc Tandem CD+IDE"
  609.                 "bsc Tandem PCMCIA"
  610.                 "bsc Tandem AT/IDE"
  611.                 "Evolution"
  612.                 "Fastlane Z3"
  613.                 "next page (Weiter)"
  614.                 )
  615.         (default 12)
  616.     ))
  617.  
  618.  (if (= scsi_flag 12)
  619.    ((set scsi_flag (askchoice
  620.         (prompt scsihaPrompt)
  621.         (help @askchoice-help)
  622.         (choices
  623.                 "GVP Series-I/II"
  624.                 "Kupke (Golem)"
  625.                 "IVS Trumpcard"
  626.                 "IVS Trumpcard Pro"
  627.                 "ICD Advantage/AdSCSI"
  628.                 "Microbot. HardFrame"
  629.                 "California Access"
  630.                 "Nexus"
  631.                 "Supra 2000 Wordsync"
  632.                 "Supra 3.0"
  633.                 "Cyberstorm SCSI"
  634.                 "Blizzard 1230 SCSI"
  635.                 "Archos Overdrive"
  636.                 "Other (Anderer)"
  637.                 )
  638.         (default 10)
  639.     ))
  640.    (set scsi_flag (+ scsi_flag 12))
  641.  ))
  642.  (if (or (= scsi_flag 3) (= scsi_flag 6) (= scsi_flag 7) (= scsi_flag 8) (= scsi_flag 9) (= scsi_flag 24))
  643.   (set Unit 0)
  644.     )
  645.  
  646.  (set Device (select scsi_flag    "scsi.device"
  647.                 "scsi.device"
  648.                 "2nd.scsi.device"
  649.                 "cdtv.device"
  650.                 "oktagon.device"
  651.                 "ALF.device"
  652.                 "vobscsi.device"
  653.                 "tandemcd.device"
  654.                 "tandem_pcmcia.device"
  655.                 "tandemat.device"
  656.                 "Evolution.device"
  657.                 "z3scsi.device"
  658.                 "gvpscsi.device"
  659.                 "scsi3.device"
  660.                 "IVS_SCSI.device"
  661.                 "IVS_SCSIpro.device"
  662.                 "icddisk.device"
  663.                 "HardFrame.device"
  664.                 "Malibu.device"
  665.                 "Nexus.device"
  666.                 "supradirect.device"
  667.                 "suprascsi.device"
  668.                 "cybscsi.device"
  669.                 "1230scsi.device"
  670.                 "cd.device"
  671.                 "scsi.device"
  672.         )
  673.     )
  674.  
  675.  (set #cival (select scsi_flag    "1"
  676.                 "1"
  677.                 "1"
  678.                 "1"
  679.                 "1"
  680.                 "0"
  681.                 "1"
  682.                 "1"
  683.                 "1"
  684.                 "1"
  685.                 "0"
  686.                 "0"
  687.                 "1"
  688.                 "0"
  689.                 "0"
  690.                 "0"
  691.                 "0"
  692.                 "0"
  693.                 "0"
  694.                 "0"
  695.                 "0"
  696.                 "0"
  697.                 "1"
  698.                 "1"
  699.                 "1"
  700.                 "1"
  701.         )
  702.     )
  703.  
  704.  (set cdrom_flag 5)
  705.  (if (or (<> scsi_flag 3) (= @user-level 2))
  706.    (set cdrom_flag (askchoice
  707.         (prompt cdrom_Prompt)
  708.         (help    @askchoice-help)
  709.         (choices    "ANSI (SCSI-2)"
  710.                 "Apple PowerCD"
  711.                 "ATAPI (IDE)"
  712.                 "Toshiba XM-3201,3332"
  713.                 "Toshiba XM-3x01,4x01"
  714.                 "Commodore CDTV/A570"
  715.                 "Apple CD-150,300"
  716.                 "Texel/Plextor"
  717.                 "Chinon"
  718.                 "Matsushita/Panasonic"
  719.                 "Mitsumi LU/FX"
  720.                 "NEC"
  721.                 "Sony CDU-541,561"
  722.                 "Teac"
  723.                 "Sanyo CRD-400I"
  724.                 "Sanyo CRD-254S"
  725.                 "Pioneer DRU-104x"
  726.                 "Hitachi CDR-xx50"
  727.                 "Nakamichi MBR-7"
  728.                 "Mitsumi FX-001D"
  729.         )
  730.         (default 4)
  731.         )
  732.  )) 
  733.  
  734.  (set player (select cdrom_flag "ansi.player"
  735.                 "ansi.player"
  736.                 "atapi.player"    
  737.                 "oldtoshi.player"
  738.                 "intern"
  739.                 "intern"
  740.                 "intern"
  741.                 "intern"
  742.                 "intern"
  743.                 "intern"
  744.                 "intern"
  745.                 "intern"
  746.                 "intern"
  747.                 "intern"
  748.                 "intern"
  749.                 "intern"
  750.                 "intern"
  751.                 "intern"
  752.                 "intern"
  753.                 "archos.player"
  754.     )
  755.  )
  756.  
  757.  (set playmod "intern")
  758.  (if (<> player "intern")
  759.     (set playmod (tackon JBDir player))
  760.  )
  761.  
  762.  (if (= player "ansi.player")
  763.     (if (> 131081 (getversion playmod))
  764.         (message ansi_error)
  765.  ))
  766.  
  767.  (if (= player "atapi.player")
  768.     (if (> 131075 (getversion playmod))
  769.         (message atapi_error)
  770.  ))
  771.  
  772.  (set CDROMVOL 0)
  773.  (set MAXVOL 255)
  774.  (if (or (= cdrom_flag 10) (= cdrom_flag 19))
  775.      (set MAXVOL 254))
  776.  
  777.  (if (<> scsi_flag 3)
  778.   (set CDROMVOL (asknumber
  779.     (prompt CDVOLPrompt)
  780.     (help @asknumber-help)
  781.     (range 0 MAXVOL)
  782.     (default MAXVOL)
  783.  )))
  784.  
  785.  (if (or (= @user-level 2) (= scsi_flag 25))
  786.    (set Device  (askstring
  787.             (prompt scsidev_Prompt)
  788.             (help    @askstring-help)
  789.             (default Device)
  790.             )
  791.  ))
  792.  
  793.  (if (or (<> Unit 0) (= @user-level 2))
  794.   (set Unit
  795.     (asknumber
  796.         (prompt scsiunit_prompt)
  797.         (help    @asknumber-help)
  798.         (range 0 7)
  799.         (default Unit)
  800.     )
  801.  ))
  802.  
  803.  (textfile 
  804.     (dest "ENVARC:PlayCDDA_JB.prefs")
  805.         (append ";$VER: Settings file for PlayCDDA_JB.dopus5 1.0\n" (tackon JBDir "JukeBox") "\n" (tackon CDDADir "CDDA") "\n" (tackon CDRDir "CDRipper") "\n" CDROMVOL "\n" TIME "\n" JBCAT "\n" Device "\n" Unit "\n" Playmod "\n" #cival "\n" FAKE "\n" (tackon CDDA_FSDir "CDDA") "\n" SOXFile)
  806.  )
  807.  (textfile
  808.     (dest "ENV:PlayCDDA_JB.prefs")
  809.         (append ";$VER: Settings file for PlayCDDA_JB.dopus5 1.0\n" (tackon JBDir "JukeBox") "\n" (tackon CDDADir "CDDA") "\n" (tackon CDRDir "CDRipper") "\n" CDROMVOL "\n" TIME "\n" JBCAT "\n" Device "\n" Unit "\n" Playmod "\n" #cival "\n" FAKE "\n" (tackon CDDA_FSDir "CDDA") "\n" SOXFile)
  810.  )
  811. ))
  812.  
  813. ; set prefs PlayCDDA_YACDP.dopus5
  814.  
  815. (if (exists (tackon defaultdest "PlayCDDA_YACDP.dopus5") (noreq))
  816.     ((set YACDP_flag 1)
  817.      (if (exists ("ENVARC:PlayCDDA_YACDP.prefs") (noreq))
  818.          (if (askbool
  819.              (prompt PlayCDDAPrompt)
  820.              (help " ")
  821.              (default 1))
  822.              (set YACDP_flag 0))    
  823.  
  824.     )))
  825.  
  826. (if (= YACDP_flag 1)
  827. (
  828.  ((set YACDPDir "Work:YACDP")
  829.     (if (<> 1 (exists (tackon YACDPDir "YACDP") (noreq)))
  830.      (until (= flag_1 1)
  831.            ((set YACDPDir (askdir
  832.             (prompt YACDPPrompt)
  833.             (help    @askdir-help)
  834.             (default "Work:")
  835.                 ))
  836.            (if (<> 1 (exists (tackon YACDPDir "YACDP") (noreq)))
  837.              (if (askbool
  838.                  (prompt YACDPERROR)
  839.                  (help " "))
  840.                  ((set flag_1 1)
  841.                  (set YACDPDir "Work:YACDP")))
  842.                  (set flag_1 1))
  843.            ))
  844.     )             
  845.  )
  846.  
  847.  (if (<> 1 flag_9)
  848.  ((set CDDADir "C:")
  849.     (if (<> 1 (exists (tackon CDDADir "CDDA") (noreq)))
  850.      (until (= flag_2 1)
  851.            ((set CDDADir (askdir
  852.             (prompt CDDAPrompt)
  853.             (help    @askdir-help)
  854.             (default "SYS:")
  855.                 ))
  856.            (if (<> 1 (exists (tackon CDDADir "CDDA") (noreq)))
  857.              (if (askbool
  858.                  (prompt CDDAERROR)
  859.                  (help " "))
  860.                  ((set flag_2 1)
  861.                  (set CDDADir "C:")))
  862.                  (set flag_2 1))
  863.            ))
  864.     )             
  865.  ))
  866.  
  867.  (if (<> 1 flag_10)
  868.  ((set CDRDir "C:")
  869.     (if (<> 1 (exists (tackon CDRDir "CDRipper") (noreq)))
  870.      (until (= flag_3 1)
  871.            ((set CDRDir (askdir
  872.             (prompt CDRPrompt)
  873.             (help    @askdir-help)
  874.             (default "SYS:")
  875.                 ))
  876.            (if (<> 1 (exists (tackon CDRDir "CDRipper") (noreq)))
  877.              (if (askbool
  878.                  (prompt CDRERROR)
  879.                  (help " "))
  880.                  ((set flag_3 1)
  881.                  (set CDRDir "C:")))
  882.                  (set flag_3 1))
  883.            ))
  884.     )             
  885.  ))
  886.  
  887.  ((set SCSIPLAY (askbool
  888.     (prompt SCSIPrompt)
  889.     (help @askbool-help)
  890.     (choices "AmigaAudio" "CDROM")
  891.     (default 0)
  892.  )))
  893.  
  894.  (if (= SCSIPLAY 0)
  895.    ((set AMIGAVOL 65)
  896.     (set CDROMVOL (asknumber
  897.     (prompt CDVOLPrompt)
  898.     (help @asknumber-help)
  899.     (range 0 255)
  900.     (default 255)
  901.  ))))
  902.  
  903.  (if (= SCSIPLAY 1)
  904.    ((set CDROMVOL 255)
  905.     (set AMIGAVOL (asknumber
  906.     (prompt AMVOLPrompt)
  907.     (help @asknumber-help)
  908.     (range 0 65)
  909.     (default 65)
  910.  ))))
  911.  
  912.     (set flag_YACDP (askchoice
  913.     (prompt YACDPVPrompt)
  914.     (help @askchoice-help)
  915.     (choices "V1.2" "V1.3")
  916.     (default 0)
  917.  ))
  918.  
  919.  (set YACDPVER "1.2")
  920.  (if (= flag_YACDP 1)
  921.      (set YACDPVER "1.3"))
  922.  
  923.  (textfile 
  924.     (dest "ENVARC:PlayCDDA_YACDP.prefs")
  925.         (append ";$VER: Settings file for PlayCDDA_YACDP.dopus5 2.4\n" (tackon YACDPDir "YACDP") "\n" (tackon CDDADir "CDDA") "\n" (tackon CDRDir "CDRipper") "\n" CDROMVOL "\n" AMIGAVOL "\n" SCSIPLAY "\n" YACDPVER)
  926.  )
  927.  (textfile 
  928.     (dest "ENV:PlayCDDA_YACDP.prefs")
  929.         (append ";$VER: Settings file for PlayCDDA_YACDP.dopus5 2.4\n" (tackon YACDPDir "YACDP") "\n" (tackon CDDADir "CDDA") "\n" (tackon CDRDir "CDRipper") "\n" CDROMVOL "\n" AMIGAVOL "\n" SCSIPLAY "\n" YACDPVER)
  930.  )
  931.  
  932. ))
  933.  
  934. ;PlayHifi.prefs
  935.  
  936. (if
  937.     (exists (tackon defaultdest "PlayHifi.dopus5") (noreq))
  938.      ((set Hifi_flag 1)
  939.       (if (exists ("ENVARC:PlayHifi.prefs") (noreq))
  940.          (if (askbool
  941.              (prompt PlayHifiPrompt)
  942.              (help " ")
  943.              (default 1))
  944.              (set Hifi_flag 0))    
  945.  
  946.     )))
  947.  
  948. (if (= Hifi_flag 1)
  949. (
  950.  ((set Play16Dir "C:")
  951.     (if (<> 1 (exists (tackon Play16Dir "Play16") (noreq)))
  952.      (until (= flag_4 1)
  953.            ((set Play16Dir (askdir
  954.             (prompt Play16Prompt)
  955.             (help    @askdir-help)
  956.             (default "Work:")
  957.                 ))
  958.            (if (<> 1 (exists (tackon Play16Dir "Play16") (noreq)))
  959.              (if (askbool
  960.                  (prompt Play16ERROR)
  961.                  (help " "))
  962.                  ((set flag_4 1)
  963.                  (set PlayDir "C:")))
  964.                  (set flag_4 1))
  965.            ))
  966.     )             
  967.  )
  968.  
  969.  ((set PlayADPCMDir "C:")
  970.     (if (<> 1 (exists (tackon PlayADPCMDir "PlayADPCM") (noreq)))
  971.      (until (= flag_5 1)
  972.            ((set PlayADPCMDir (askdir
  973.             (prompt PlayADPCMPrompt)
  974.             (help    @askdir-help)
  975.             (default "Work:")
  976.                 ))
  977.            (if (<> 1 (exists (tackon PlayADPCMDir "PlayADPCM") (noreq)))
  978.              (if (askbool
  979.                  (prompt PlayADPCMERROR)
  980.                  (help " "))
  981.                  ((set flag_5 1)
  982.                  (set PlayADPCMDir "C:")))
  983.                  (set flag_5 1))
  984.            ))
  985.     )             
  986.  )
  987.  
  988.  ((set PlayMPEGDir "C:")
  989.     (if (<> 1 (exists (tackon PlayMPEGDir "mpega") (noreq)))
  990.      (until (= flag_6 1)
  991.            ((set PlayMPEGDir (askdir
  992.             (prompt PlayMPEGPrompt)
  993.             (help    @askdir-help)
  994.             (default "Work:")
  995.                 ))
  996.            (if (<> 1 (exists (tackon PlayMPEGDir "mpega") (noreq)))
  997.              (if (askbool
  998.                  (prompt PlayMPEGERROR)
  999.                  (help " "))
  1000.                  ((set flag_6 1)
  1001.                  (set PlayMPEGDir "C:")))
  1002.                  (set flag_6 1))
  1003.            ))
  1004.     )             
  1005.  )
  1006.  
  1007.     (set flag_1 (askchoice
  1008.     (prompt AmigaPrompt)
  1009.     (help @askchoice-help)
  1010.     (choices "PAL/NTSC" "DblPAL/DblNTSC/Multiscan/Euro72/Super72" "Graphic-Card")
  1011.     (default 1)
  1012.  ))
  1013.  
  1014.     (set flag_2 (askchoice
  1015.     (prompt PlayPrompt)
  1016.     (help @askchoice-help)
  1017.     (choices "Standard 8Bit" "Standard 14Bit" "14Bit CyberSound System" "MacroSystem MaestroPro Board")
  1018.     (default 1)
  1019.  ))
  1020.  
  1021.     (set flag_3 (askchoice
  1022.     (prompt MPEG_1Prompt)
  1023.     (help @askchoice-help)
  1024.     (choices "Low (68020)" "Medium (68030)" "High (68040/60)")
  1025.     (default 1)
  1026.  ))
  1027.  
  1028.     (set flag_4 (askchoice
  1029.     (prompt MPEG_2Prompt)
  1030.     (help @askchoice-help)
  1031.     (choices "Normal (44100Hz) no PAL/NTSC !" "1/2 (22050Hz)" "1/4 (11025Hz)")
  1032.     (default 1)
  1033.  ))
  1034.  
  1035.     (set flag_5 (askchoice
  1036.     (prompt MPEG_3Prompt)
  1037.     (help @askchoice-help)
  1038.     (choices "8Bit" "14Bit")
  1039.     (default 1)
  1040.  ))
  1041.  
  1042.  (if (= flag_2 0)
  1043.      (set OUTPUT "Paula8 "))
  1044.  (if (= flag_2 1)
  1045.      (set OUTPUT "Paula14 "))
  1046.  (if (= flag_2 2)
  1047.      (set OUTPUT "Paula14c "))
  1048.  (if (= flag_2 3)
  1049.      (set OUTPUT "MPro "))
  1050.  (if (<> flag_1 0)
  1051.      (set PL16OP "FAST FILTER=OFF"))
  1052.  (if (= flag_1 0)
  1053.      (set PL16OP "FILTER=OFF"))
  1054.  
  1055.  (if (= flag_4 0)
  1056.      (set flag_6 1))
  1057.  (if (= flag_4 1)
  1058.      (set flag_6 2))
  1059.  (if (= flag_4 2)
  1060.      (set flag_6 4))
  1061.  
  1062.  (if (= flag_5 0)
  1063.      (set flag_7 " -e8"))
  1064.  
  1065.  
  1066.  (textfile 
  1067.     (dest "ENVARC:PlayHifi.prefs")
  1068.         (append ";$VER: Settings file for PlayHifi.dopus5 & PlayHifi_DT.dopus5\n" (tackon Play16Dir "Play16") "\n" (tackon PlayADPCMDir "PlayADPCM") "\n" (tackon PlayMPEGDir "mpega") "\n" (cat OUTPUT PL16OP) "\n" (cat "-p -f0 -d" flag_6 " -q" flag_3 flag_7) "\n")
  1069.  )
  1070.  (textfile 
  1071.     (dest "ENV:PlayHifi.prefs")
  1072.         (append ";$VER: Settings file for PlayHifi.dopus5 & PlayHifi_DT.dopus5\n" (tackon Play16Dir "Play16") "\n" (tackon PlayADPCMDir "PlayADPCM") "\n" (tackon PlayMPEGDir "mpega") "\n" (cat OUTPUT PL16OP) "\n" (cat "-p -f0 -d" flag_6 " -q" flag_3 flag_7) "\n")
  1073.  )
  1074.  
  1075. ))
  1076.  
  1077. (complete 75)
  1078.  
  1079. ;*********************************************
  1080. ; set guidedir
  1081.  
  1082. (message GuidePrompt)
  1083. (if (>= @user-level 1)
  1084. (set GuideDir (askdir
  1085.     (prompt GuideDirPrompt)
  1086.     (help    @askdir-help)
  1087.     (default "DOpus5:")
  1088. )))
  1089.  
  1090. (makedir (tackon GuideDir "Check"))
  1091. (makedir (tackon GuideDir "Pics"))
  1092.  
  1093. (copyfiles
  1094.     (prompt    GuideCopyPrompt)
  1095.     (help    @copyfiles-help)
  1096.     (source "Soundplayer.guide")
  1097.     (dest    GuideDir)
  1098.         (confirm "EXPERT")
  1099.         (optional "force")
  1100.     (infos)
  1101. )
  1102.  
  1103. ; Soundplayer.guide ersetzt PlayCDDA_YACDP.guide
  1104.  
  1105. (if (exists (tackon GuideDir "PlayCDDA_YACDP.guide") (noreq))
  1106.     ((delete (tackon GuideDir "PlayCDDA_YACDP.guide"))
  1107.     (delete (tackon GuideDir "PlayCDDA_YACDP.guide.info")))
  1108. )
  1109.  
  1110.  
  1111. (copyfiles
  1112.     (prompt    GuideCopyPrompt)
  1113.     (help    @copyfiles-help)
  1114.     (source "players.readme")
  1115.     (dest    GuideDir)
  1116.         (confirm "EXPERT")
  1117.         (optional "force")
  1118.     (infos)
  1119. )
  1120.  
  1121. (copyfiles
  1122.     (prompt    GuideCopyPrompt)
  1123.     (help    @copyfiles-help)
  1124.     (source "snapshot.gif")
  1125.     (dest    GuideDir)
  1126.         (confirm "EXPERT")
  1127.         (optional "force")
  1128.     (infos)
  1129. )
  1130.  
  1131. (copyfiles
  1132.     (prompt    GuideCopyPrompt)
  1133.     (help    @copyfiles-help)
  1134.     (source "zgif00")
  1135.     (dest    GuideDir)
  1136.         (confirm "EXPERT")
  1137.         (optional "force")
  1138. )
  1139.  
  1140. (complete 85)
  1141.  
  1142. (copyfiles
  1143.     (prompt    GuideCopyPrompt2)
  1144.     (help    @copyfiles-help)
  1145.     (source "Check")
  1146.     (dest    (tackon GuideDir "Check"))
  1147.         (pattern "#?")
  1148.         (confirm "EXPERT")
  1149.         (optional "force")
  1150.         (files)
  1151. )
  1152.  
  1153. (copyfiles
  1154.     (prompt    GuideCopyPrompt)
  1155.     (help    @copyfiles-help)
  1156.     (source "Pics")
  1157.     (dest    (tackon GuideDir "Pics"))
  1158.         (pattern "#?")
  1159.         (confirm "EXPERT")
  1160.         (optional "force")
  1161.         (files)
  1162. )
  1163.  
  1164.  
  1165. (complete 100)
  1166.  
  1167. (if (<> defaultdest "DOpus5:Arexx")
  1168.     (message OpusEdit))
  1169.  
  1170. (delete (tackon GuideDir ".info"))
  1171.  
  1172. (exit #exitMsg)
  1173.